home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 21
/
Cream of the Crop 21 (Terry Blount) (October 1996).iso
/
database
/
hsmt4095.zip
/
HSMART95.EXE
/
0
/
RCDATA
/
TFORM3
/
TFORM3.txt
Wrap
Text File
|
1996-06-20
|
7KB
|
285 lines
object Form3: TForm3
Left = 283
Top = 223
HelpContext = 10
AutoScroll = False
Caption = 'Food Item Planner'
ClientHeight = 229
ClientWidth = 461
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
FormStyle = fsStayOnTop
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 16
object Label1: TLabel
Left = 18
Top = 5
Width = 229
Height = 16
Caption = 'Move recipe ingredients to list box:'
end
object Label2: TLabel
Left = 272
Top = 181
Width = 133
Height = 16
Caption = 'Number of Servings:'
end
object Label3: TLabel
Left = 272
Top = 36
Width = 47
Height = 15
Caption = 'Calories'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 272
Top = 59
Width = 34
Height = 15
Caption = 'Carbo'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 272
Top = 82
Width = 41
Height = 15
Caption = 'Protein'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object fipro: TLabel
Left = 335
Top = 82
Width = 24
Height = 15
Alignment = taRightJustify
Caption = 'XXX'
Color = clBtnFace
Font.Color = clBlue
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object ficarbo: TLabel
Left = 335
Top = 59
Width = 24
Height = 15
Alignment = taRightJustify
Caption = 'XXX'
Color = clBtnFace
Font.Color = clBlue
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object fical: TLabel
Left = 335
Top = 36
Width = 24
Height = 15
Alignment = taRightJustify
Caption = 'XXX'
Color = clBtnFace
Font.Color = clBlue
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label6: TLabel
Left = 272
Top = 106
Width = 17
Height = 15
Caption = 'Fat'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 272
Top = 129
Width = 43
Height = 15
Caption = 'Sodium'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 272
Top = 152
Width = 25
Height = 15
Caption = 'Chol'
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object fichol: TLabel
Left = 337
Top = 152
Width = 24
Height = 15
Alignment = taRightJustify
Caption = 'XXX'
Color = clBtnFace
Font.Color = clBlue
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object fina: TLabel
Left = 337
Top = 129
Width = 24
Height = 15
Alignment = taRightJustify
Caption = 'XXX'
Color = clBtnFace
Font.Color = clBlue
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object fifat: TLabel
Left = 336
Top = 106
Width = 24
Height = 15
Alignment = taRightJustify
Caption = 'XXX'
Color = clBtnFace
Font.Color = clBlue
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Edit1: TEdit
Left = 410
Top = 178
Width = 44
Height = 24
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 0
Text = '1.0'
end
object BitBtn1: TBitBtn
Left = 368
Top = 18
Width = 89
Height = 33
Caption = 'Clear'
ModalResult = 3
TabOrder = 1
OnClick = BitBtn1Click
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B55555555555555750000}
NumGlyphs = 2
Style = bsWin31
end
object BitBtn2: TBitBtn
Left = 368
Top = 100
Width = 89
Height = 33
TabOrder = 2
OnClick = BitBtn2Click
Kind = bkOK
Style = bsWin31
end
object BitBtn3: TBitBtn
Left = 368
Top = 59
Width = 89
Height = 33
Caption = 'Add'
TabOrder = 3
OnClick = BitBtn3Click
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555550FF0559
1950555FF75F7557F7F757000FF055591903557775F75557F77570FFFF055559
1933575FF57F5557F7FF0F00FF05555919337F775F7F5557F7F700550F055559
193577557F7F55F7577F07550F0555999995755575755F7FFF7F5570F0755011
11155557F755F777777555000755033305555577755F75F77F55555555503335
0555555FF5F75F757F5555005503335505555577FF75F7557F55505050333555
05555757F75F75557F5505000333555505557F777FF755557F55000000355557
07557777777F55557F5555000005555707555577777FF5557F55553000075557
0755557F7777FFF57555553350000055555555775777775555550000}
NumGlyphs = 2
Style = bsWin31
end
object TabListBox1: Ttablistbox
Left = 7
Top = 23
Width = 255
Height = 199
DragMode = dmAutomatic
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ItemHeight = 14
ParentFont = False
TabOrder = 4
OnDragDrop = ListBox1DragDrop
OnDragOver = ListBox1DragOver
OnEndDrag = TabListBox1EndDrag
TabStops = 0
end
end